foxpro For Each